home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Network Support Library
/
RoseWare - Network Support Library.iso
/
apidev
/
tpapi.exe
/
BUILDNW.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1994-01-14
|
2KB
|
62 lines
{#Z+}
{***************************************************************************}
{** Program : BUILDNW **}
{***************************************************************************}
{** Version : 0.0 ** Started : / / ** Ended : / / **}
{***************************************************************************}
{******************************** Description ******************************}
{***************************************************************************}
{** Program which uses all netware api units. Just makes it easier to **}
{** rebuild the library. **}
{** **}
{** **}
{** **}
{***************************************************************************}
{******************************** Information ******************************}
{***************************************************************************}
{** **}
{** **}
{** **}
{** This code is (c) 1991 - 1994 Antonio Covelli. ALL RIGHTS RESERVED. **}
{** Portions (c) Novell Inc, **}
{** **}
{** **}
{***************************************************************************}
PROGRAM BUILDNW;
{$I NETWARE.INC}
{#Z-}
USES
{$IFDEF WINDOWS}
wincrt,
{$ENDIF}
NWDPMI, NWENCRYP,
NETWARE,
NWVAR, NWERROR, NWACCNTG, NWBINDRY,
NWCONN, NWFSYST, NWEATTR, NWFSSERV, NWMESS,
NWPRINT, NWQUEUE, NWSYNCH, NWTTS, NWWRKSTN,
NWMISC;
var
Obj : NetwareOBJ;
BEGIN
writeln;
Writeln ('TPAPI version: ', GetTPAPIVersion);
Obj.Init (true);
writeln ('VLM Shells present: ', VLMPresent);
OBJ.Done;
END.